home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (DO) / Micro on the Apple Volume 2 (1981)(Micro Ink).zip / Micro on the Apple Volume 2 (1981)(Micro Ink).do / BASIC TRANSFER.bas < prev    next >
BASIC Source File  |  1996-12-24  |  1KB  |  36 lines
  1. 1  REM  ************************
  2. 2  REM  *                      *
  3. 3  REM  * MICROMODEM TRANSFERS *
  4. 4  REM  *   GEORGE DOMBROWSKI  *
  5. 5  REM  *                      *
  6. 6  REM  *    BASIC TRANSFER    *
  7. 7  REM  *                      *
  8. 8  REM  *  COPYRIGHT (C) 1981  *
  9. 9  REM  *    MICRO INK, INC.   *
  10. 10  REM * CHELMSFORD, MA 01824 *
  11. 11  REM *  ALL RIGHTS RESERVED *
  12. 12  REM *                      *
  13. 13  REM ************************
  14. 14  REM 
  15. 15  REM 
  16. 16  REM  BASIC TRANSFER/MICROMODEM II
  17. 20  REM  FIRST RUN THIS PROGRAM AND THEN
  18. 30  REM  ESTABLISH REMOTE CONTROL OF RECEIVING MACHINE
  19. 40  REM  LEAVE TERMINAL MODE BY TYPING CTRL-A/CTRL-X
  20. 50  REM  THEN TYPE <EXEC BASIC PROGRAM TRANSFER>
  21. 60 D$ =  CHR$(4)
  22. 70  PRINT D$"OPEN BASIC PROGRAM TRANSFER"
  23. 80  PRINT D$"WRITE BASIC PROGRAM TRANSFER"
  24. 90  PRINT "POKE 1530,80:REM FOR LONG FLOATING POINT PROGRAMS A GREATER DELAY MAY BE REQUIRED."
  25. 100  PRINT "POKE 1914,18"
  26. 110  PRINT "POKE 33,30"
  27. 120  PRINT "IN#0"
  28. 130  PRINT "PR#2"
  29. 140  PRINT "LIST"
  30. 150  PRINT "PR#0"
  31. 160  PRINT "IN#2"
  32. 170  PRINT "TEXT"
  33. 180  PRINT "POKE 1530,3"
  34. 190  PRINT "POKE 1914,138"
  35. 200  PRINT D$"CLOSE"
  36. 210  END